home *** CD-ROM | disk | FTP | other *** search
/ IRIX 6.4 Applications 1997 August / SGI IRIX 6.4 Applications 1997 August.iso / dist / dynaweb.idb / usr / lib / Insight / data / config / rootbbar.dwc.z / rootbbar.dwc
Encoding:
Text File  |  1997-07-30  |  2.1 KB  |  60 lines
  1.  
  2. #####################################################################
  3. #####################################################################
  4. ##                                                                 ##
  5. ##                ROOT BUTTON BAR CREATION                         ##
  6. ##                                                                 ##
  7. #####################################################################
  8. #####################################################################
  9.  
  10. dwScript Generic__RootButtonBarView {
  11.   if {[dwGet State__Frames] == 1} {
  12.     dwProcessTemplate Frames__RootButtonBarView
  13.   } else {
  14.     dwProcessTemplate NoFrames__RootButtonBarView
  15.   }
  16. }
  17.  
  18. dwTemplate Frames__RootButtonBarView {
  19. <HTML>
  20.   <HEAD>
  21.     <BASE HREF="$[dwGet BaseUrl]@Generic__RootButtonBarView">
  22.   </HEAD>
  23.   <BODY BGCOLOR=#C0C0C0>
  24.    <TABLE WIDTH="100%" HEIGHT=42 CELLPADDING=0 CELLSPACING=0>
  25.     <TR ALIGN=left VALIGN=center>
  26.      <TD>
  27.       <TABLE NOWRAP CELLPADDING=0 CELLSPACING=2>
  28.        <TR ALIGN=center VALIGN=center>
  29.         <NOBR>
  30.          $[dwGetParam a_href_map inso_home_page]
  31.          $[dwGetParam graphic_image_srcmap spacer]
  32.          $[dwGetParam graphic_image_srcmap spacer]
  33.          <A HREF="@Generic__RootView$[dwCall RemoveHfUrlParam]$[dwGet UrlParamString];hf=0$[dwGet UrlQueryString]"\
  34.             TARGET=_top>$[dwGetParam button_image_srcmap hide_frames]</A>
  35.         </NOBR>
  36.       </TABLE>
  37.    </TABLE>
  38.   </BODY>
  39. </HTML>
  40. }
  41.  
  42. dwScript NoFrames__RootShowFramesButton {
  43.   if {[dwQueryCapability "frames" $capabilities] == 1} { 
  44.     dwSend [dwGetParam graphic_image_srcmap spacer]
  45.     dwSend [dwGetParam graphic_image_srcmap spacer]
  46.     dwSend [dwGetParam graphic_image_srcmap spacer]
  47.     dwSend [dwGetParam graphic_image_srcmap spacer]
  48.     dwSend <A\ HREF=\"@Generic__RootView[dwCall RemoveHfUrlParam][dwGet UrlQueryString]\"\
  49.                           TARGET=_top>[dwGetParam button_image_srcmap show_frames]</A>
  50.   }
  51. }
  52.  
  53. dwTemplate NoFrames__RootButtonBarView {
  54.   <HR SIZE=4>
  55.   $[dwGetParam a_href_map inso_home_page]   
  56.   $[dwCall NoFrames__RootShowFramesButton]
  57.   <HR SIZE=4>
  58. }
  59.  
  60.